home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / mactosh / util / simulare.sit / Simula 4.07 Reference / card_6148.txt < prev    next >
Text File  |  1989-05-02  |  3KB  |  165 lines
  1. -- card: 6148 from stack: in.07 Reference
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2697
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 2000
  11. -- rect: left=160 top=162 right=187 bottom=249
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: declaration
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   go to card id 4112
  23. end mouseUp
  24.  
  25.  
  26.  
  27.  
  28. -- part 2 (button)
  29. -- low flags: 00
  30. -- high flags: 2000
  31. -- rect: left=160 top=185 right=206 bottom=249
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 1
  35. -- font id: 0
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 16
  39. -- part name: Statement
  40. ----- HyperTalk script -----
  41. on mouseUp
  42.   go to card id 5806
  43. end mouseUp
  44.  
  45.  
  46.  
  47.  
  48. -- part 3 (button)
  49. -- low flags: 00
  50. -- high flags: A002
  51. -- rect: left=404 top=249 right=266 bottom=423
  52. -- title width / last selected line: 0
  53. -- icon id / first selected line: 0 / 0
  54. -- text alignment: 1
  55. -- font id: 0
  56. -- text size: 12
  57. -- style flags: 0
  58. -- line height: 16
  59. -- part name: :-
  60. ----- HyperTalk script -----
  61. on mouseUp
  62.   go to card id 7242
  63. end mouseUp
  64.  
  65.  
  66.  
  67.  
  68. -- part 4 (button)
  69. -- low flags: 00
  70. -- high flags: A002
  71. -- rect: left=366 top=250 right=267 bottom=385
  72. -- title width / last selected line: 0
  73. -- icon id / first selected line: 0 / 0
  74. -- text alignment: 1
  75. -- font id: 0
  76. -- text size: 12
  77. -- style flags: 0
  78. -- line height: 16
  79. -- part name: :=
  80. ----- HyperTalk script -----
  81. on mouseUp
  82.   go to card id 5983
  83. end mouseUp
  84.  
  85.  
  86.  
  87.  
  88. -- part 5 (button)
  89. -- low flags: 00
  90. -- high flags: 2000
  91. -- rect: left=139 top=102 right=153 bottom=380
  92. -- title width / last selected line: 0
  93. -- icon id / first selected line: 0 / 0
  94. -- text alignment: 1
  95. -- font id: 0
  96. -- text size: 12
  97. -- style flags: 0
  98. -- line height: 16
  99. -- part name: Proc-param Spec
  100. ----- HyperTalk script -----
  101. on mouseUp
  102.   go to card id 14163
  103. end mouseUp
  104.  
  105.  
  106.  
  107.  
  108. -- part 6 (button)
  109. -- low flags: 00
  110. -- high flags: A004
  111. -- rect: left=440 top=55 right=75 bottom=495
  112. -- title width / last selected line: 0
  113. -- icon id / first selected line: 0 / 0
  114. -- text alignment: 1
  115. -- font id: 0
  116. -- text size: 12
  117. -- style flags: 0
  118. -- line height: 16
  119. -- part name: Explain
  120. ----- HyperTalk script -----
  121. on mouseUp
  122.   go to card id 40553
  123. end mouseUp
  124.  
  125.  
  126.  
  127.  
  128. -- part 7 (button)
  129. -- low flags: 00
  130. -- high flags: 8004
  131. -- rect: left=43 top=109 right=131 bottom=127
  132. -- title width / last selected line: 0
  133. -- icon id / first selected line: 0 / 0
  134. -- text alignment: 1
  135. -- font id: 0
  136. -- text size: 12
  137. -- style flags: 0
  138. -- line height: 16
  139. -- part name: Parameters
  140. ----- HyperTalk script -----
  141. on mouseUp
  142.   go to card id 40763
  143. end mouseUp
  144.  
  145.  
  146.  
  147.  
  148. -- part contents for background part 1
  149. ----- text -----
  150. type procedure  Func-id {(identifier {, identifier});
  151.     [name identifier {, identifier})    ;]
  152.     [value identifier {, identifier})    ;]
  153.     [proc param spec ;]
  154. begin
  155.      {declaration ;}
  156.      {statement ;}
  157. end;
  158. Note: 
  159. ΓÇó If there are no parameters, the '()' is left out
  160. ΓÇó Function-result is returned with a      or       to    
  161.    the Func-id.
  162.  
  163. -- part contents for background part 2
  164. ----- text -----
  165. function declaration